20 S=0:FORI=679 TO 765: READ J
30 S=S+J:POKE I,J:NEXT
50 POKE680,PEEK(816):POKE681,PEEK(817)
60 POKE816,679 AND 255:POKE817,679/256
70 PRINT:PRINT"PLAY NOW!"
100 DATA 32,165,244,176,81,132
101 DATA 253,169,54,133,1,160
102 DATA 0,132,251,169,8,133
103 DATA 252,177,187,201,36,240
104 DATA 54,160,0,177,251,201
105 DATA 173,208,32,200,177,251
106 DATA 201,30,240,4,201,31
107 DATA 208,21,200,177,251,201
108 DATA 208,208,14,169,234,145
109 DATA 251,136,169,0,145,251
110 DATA 136,169,169,145,251,230
111 DATA 251,208,2,230,252,165
112 DATA 252,197,253,144,204,240
113 DATA 202,169,55,133,1,164
114 DATA 253,24,96